home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Franz PD / Franz PD Disk #228 (1993)(Rhein-Sieg-Soft).zip / Franz PD Disk #228 (1993)(Rhein-Sieg-Soft).adf / Tannstein_v1.7 / Tannstein.p < prev    next >
Text File  |  1993-04-08  |  16KB  |  578 lines
  1. Program Tannstein;
  2.  
  3. Uses Tannenfels,intuition;
  4. From Windows Uses Menus;
  5.  
  6. VAR x,y:integer;
  7.     was: char;
  8.     c:Char;
  9.     m: ^intuiMessage;
  10.  
  11.  
  12. Procedure Taste;
  13. Begin
  14. ADDidcmp(Mousebuttons);
  15. Repeat
  16.   c:=Readkey;
  17.   IF MessageReceived(Mousebuttons) Then
  18.     Begin
  19.  
  20.     End;
  21. Until Mouseclicked;
  22. End;
  23.  
  24.  
  25.  
  26.  
  27. Procedure p(s:string);
  28. Begin
  29. Writeln(s);
  30. End;
  31. Procedure Einleitung;
  32. Begin
  33. Bild;
  34. page;
  35. Writeln('Mitten in dem Pfälzer Walde steht des Grafen Burg,');
  36. Writeln('Tannstein ward sie hier genannt.Regieren tat er');
  37. Writeln('gut und weise,doch kam ein Krieg über das ');
  38. Writeln('Land,und damit die Ruhe des mittelalterlichen Waldes');
  39. Writeln('schwand.Unötig Blut zu vergießen,das wollte der ');
  40. Writeln('Graf nicht.Deshalb wollte er sich mit Herzog Klaas ');
  41. Writeln('treffen,um Frieden zu beschließen.Doch der durch-');
  42. Writeln('triebene Herzog wollte das Land an sich reißen,und');
  43. Writeln('stellte dem Grafen eine Falle.Dieser konnte ');
  44. Writeln('sich gerade noch vor den Schergen Herzogs Klaas ');
  45. Writeln('retten.Auch wenn er nun ohne Waffen und Begleitung');
  46. Writeln('dastand,er wollte zurück nach Tannstein gelangen,');
  47. Writeln('die dastand,um aller Belagerung des Herzogs zu trotzen,');
  48. Writeln('und das friedliche Land vom Herzog zu befreien.');
  49. taste;
  50. End;    { Einleitung }
  51. Procedure Ende;
  52. Begin
  53. page;
  54. Writeln("Nun denn,edler Ritter von Tannstein,");
  55. Writeln("Sie haben es wieder einmal geschafft.");
  56. Writeln("Der Herzog ist verjagt,und das Land");
  57. Writeln("Mit GOTTES Hilfe gerettet.");
  58. Readln;
  59. End;
  60. Procedure Auswertung2;
  61. var x,y:integer;
  62. Begin
  63. x:=mousex;
  64. y:=mousey;
  65. if (x>50) AND (x<100) AND (y>200) AND (y<225) then was:='1';
  66. if (x>150) AND (x<200) AND (y>200) AND (y<225) then was:='2';
  67. if (x>250) AND (x<300) AND (y>200) AND (y<225) then was:='3';
  68. End;
  69.  
  70. Procedure UM;
  71. Begin
  72. page;
  73. Writeln(#e'4m                     * * * Tannstein * * *                 ');
  74. Write(#e'0m');
  75. Writeln(#e'2m');
  76. End;
  77. Procedure um2;
  78. Begin
  79. Writeln(#e'0m '#e'3m');
  80. End;
  81. Procedure um3;
  82. Begin
  83. Writeln(#e'0m'#e'7m');
  84. Writeln('Was wollen Sie tun?');
  85. Write(#e'0m');
  86. RectFill(CRTRastport,50,200,100,225);
  87. REctFill(CrtRastport,150,200,200,225);
  88. Rectfill(CrtRASTPORT,250,200,300,225);
  89. gotoxy(8,24);  Write('1');
  90. Gotoxy(18,24); Write('2');
  91. Gotoxy(28,24); Write('3');
  92. x:=0;
  93. y:=0;
  94. taste;
  95. Auswertung2;
  96. gotoxy(1,14);
  97. End;
  98.  
  99.  
  100. Procedure Warte;
  101. Var c:Char;
  102. Begin
  103. x:=0;
  104. y:=0;
  105. gotoxy(1,17);
  106. Writeln('------------Bitte Space für weiter drücken!-----------');
  107. Repeat
  108. c:=Readkey;
  109. Until c=' ';
  110. End;
  111.  
  112. Begin
  113. Einleitung;
  114. Repeat
  115. UM;
  116. p('Sie stehen im Wald,');
  117. p('vor ihnen erstreckt sich ein Weg,');
  118. p('neben ihnen steht ein alter Baum,');
  119. p('Im Wald gibt es keine Räuber mehr.');
  120. um2;
  121. p("(1) Den Baum untersuchen");
  122. p("(2) Den Weg entlanggehen");
  123. p("(3) Schlafen");
  124. um3;
  125. if was='1' then p("Sie haben leider ihre Zeit vergeudet.");
  126. if was='3' then p("Sie wollten doch das Land befreien.");
  127. warte;
  128. UNTIL was='2';
  129. {-----------------Teil 2----------------------}
  130. Repeat
  131. UM;
  132. p("Sie gehen den Weg entlang,");
  133. p("Schilf steht rechts und links des Weges,");
  134. p("Es scheint sie jemand zu beobachten,");
  135. p("Doch auf der weiten,hellen Ebene sehen sie niemand.");
  136. um2;
  137. p("(1) Weitergehen");
  138. p("(2) Das Schilf absuchen");
  139. p("(3) Zurückgehen");
  140. um3;
  141. if was='2' then p("Nach ermüdender Suche geben sie es auf.");
  142. if was='3' then p("Sie wollten doch Tannstein erreichen!");
  143. warte;
  144. Until was='1';
  145. {-----------------Teil 3-----------------------}
  146. Repeat
  147. um;
  148. p("Die Landschaft wird hügeliger,das Schilf");
  149. p("verschwindet,und dort wächst mittelhohes,");
  150. p("goldenes Gras.Die Umgebung zeigt ihre ");
  151. p("Stimmung des Hochsommers.");
  152. um2;
  153. p("(1) Pause machen");
  154. p("(2) Heu ernten");
  155. p("(3) weitergehen");
  156. um3;
  157. if was='1' then p("Doch jetzt noch nicht!");
  158. if was='2' then p("Wir haben heute noch was anderes vor!");
  159. warte;
  160. Until was='3';
  161. {-----------------Teil 4-----------------------}
  162. Repeat
  163. UM;
  164. p("Sie sind an einem kühlen Bach angetroffen,");
  165. p("er schimmert in der Sonne wie ein Edelstein,");
  166. p("das Bachufer ist trocken,und dort steht ein");
  167. p("großer Stein,auf dem ein Frosch sitzt.");
  168. um2;
  169. p("(1) weitergehen");
  170. p("(2) Baden");
  171. p("(3) Den Frosch nach dem Weg fragen");
  172. um3;
  173. if was='2' then p("Das hat ihnen nichts geschadet!");
  174. if was='3' then p("Seit wann können Frösche reden?");
  175. warte;
  176. Until was='1';
  177. {-------------------Teil 5---------------------}
  178. Repeat
  179. UM;
  180. p("Als der Weg eine Biegung machte,begegnet");
  181. p("ihnen eine alte Frau,die Holz sammelt");
  182. p("Sie hat schon einen krummen Rücken,und");
  183. p("das Holz scheint sie zu erdrücken.");
  184. um2;
  185. p("(1) grüßen und weitergehen");
  186. p("(2) Holz aufladen");
  187. p("(3) Holz zur Hütte tragen");
  188. um3;
  189. if was='1' then p("Sie sollten sich schämen,als Graf von Tannstein!");
  190. if was='2' then p("Die alte Frau kann sich beinahe nicht mehr halten!");
  191. Warte;
  192. Until was='3';
  193. {-----------------Teil 6------------------}
  194. Repeat
  195. UM;
  196. p("Sie tragen der alten Frau ihr Holz in ");
  197. p("die Scheune,und bekommen dafür etwas");
  198. p("Proviant.Danach gehen sie weiter,bis sie");
  199. p("plötzlich Nebel und ein Moor dahinter sehen.");
  200. um2;
  201. p("(1) weitergehen");
  202. p("(2) umkehren");
  203. p("(3) etwas essen");
  204. um3;
  205. if was='2' then p("Du Angsthase,mach endlich voran!");
  206. if was='3' then p("Genug der leiblichen Genüsse!");
  207. Warte;
  208. Until was='1';
  209. {-----------------Teil 7-----------------}
  210. Repeat
  211. UM;
  212. p("Mutig wie sie sind,gehen sie tatsächlich");
  213. p("ins Moor hinein.Vor lauter Nebel sehen");
  214. p("sie absolut nichts.Plötzlich kracht");
  215. p("und raschelt es hinter ihnen!");
  216. um2;
  217. p("(1) umdrehen,und schauen");
  218. p("(2) nach links schauen");
  219. p("(3) beschleunigen");
  220. um3;
  221. if was='1' then p("Lieber nicht!");
  222. if was='2' then p("Trottel,es ist doch dichter Nebel!");
  223. Warte;
  224. Until was='3';
  225. {----------------Teil 8------------------}
  226. Repeat
  227. UM;
  228. p("Mit letzter Kraft schaffen sie es gerade noch,");
  229. p("aus dem dunklen Moor zu entwischen.");
  230. p("Nun scheint auch die Sonne wieder in ihrem");
  231. p("alten Glanz.Sie hören eine Trompete!");
  232. um2;
  233. p("(1) ab hinter die Büsche");
  234. p("(2) warten,wer es ist");
  235. p("(3) Zurückblasen");
  236. um3;
  237. if was='3' then p("Mit was denn,du Trottel?");
  238. if was='2' then p("So siehst du aus!");
  239. Warte;
  240. Until was='1';
  241. {-----------------Teil 9------------------}
  242. Repeat
  243. UM;
  244. p("Des Herzogs Schergen jagen durch den Wald.");
  245. p("Du siehst etwa 100 schwerbewaffnete Reiter");
  246. p("auf dem Weg.Sie sind stark angeheizt,und ");
  247. p("scheinen dich zu suchen!");
  248. um2;
  249. p("(1) warten");
  250. p("(2) laut rufen");
  251. p("(3) auf die Reiter schießen");
  252. um3;
  253. if was='2' then p("Sie sind doch nicht lebensmüde,oder?");
  254. if was='3' then p("Du bist mir vielleicht einer!Mit was denn???");
  255. Warte;
  256. Until was='1';
  257. {-----------------Teil 10-----------------}
  258. Repeat
  259. UM;
  260. p("Zum Glück haben sie sich entschieden,");
  261. p("hinter dem Busch zu warten!Denn jetzt");
  262. p("können sie erkennen,daß auch der Herzog");
  263. p("Klaas 3. persönlich auf die Jagd geht!");
  264. um2;
  265. p("(1) zu ihm laufen");
  266. p("(2) ihn erschießen");
  267. p("(3) bücken und warten");
  268. um3;
  269. if was='1' then p("Der würde dich glatt tottrampeln!");
  270. if was='2' then p("Das Schießpulver ist doch noch nicht erfunden!");
  271. warte;
  272. Until was='3';
  273. {-----------------Teil 11--------------}
  274. Repeat
  275. Um;
  276. p("Sie gehen eine Weile hinter dem Gestrüpp entlang,");
  277. p("bis das Lärmen der Reiter verstummt.Wohin die wohl");
  278. p("reiten,wen die wohl suchen.Wären sie doch bloß schon");
  279. p("zu Hause,dann könnten sie endlich etwas gegen diese");
  280. p("Galgenvögel tun.Plötzlich erstarren sie!Vor ihnen");
  281. p("glänzt Stahl in der Sonne!Ein Schwert!");
  282. um2;
  283. p("(1) liegenlassen und weitergehen");
  284. p("(2) mitnehmen");
  285. p("(3) weitergehen");
  286. um3;
  287. if was='1' then p("Nimm es mit,du kannst es noch brauchen!");
  288. if was='3' then p("Nicht so hastig,Gräflein!");
  289. Warte;
  290. Until was='2';
  291. {----------------Teil 11---------------}
  292. Repeat
  293. UM;
  294. p("Sie nehmen das Schwert an sich,und gehen wieder auf");
  295. p("den Weg,wo vor kurzem noch die Reiter gesauset sind!");
  296. p("Hinter einer Biegung kommt ihnen ein Bauer entgegen,");
  297. p("der nachdem er sie sah,auf den Boden fällt.");
  298. p("Was sagen sie?");
  299. um2;
  300. p("(1) :´Steh auf,treuer Mann,und erzähle´");
  301. p("(2) :´Knie hinieder,Bauerntrampel!´ ");
  302. p("(3) :´Aus dem Weg,du Bauerntölpel!´ ");
  303. um3;
  304. if (was='3') or (was='2') then p("Der Bauer schaut sie mitleidig an!");
  305. Warte;
  306. Until was='1';
  307. {-------------Teil 12-----------}
  308. Repeat
  309. UM;
  310. p("Der treue Bauer berichtet ihnen,daß");
  311. p("der Herzog das Dorf überfallen hat,und");
  312. p("Sie nun sucht,um sie daran zu hindern,Tannstein ");
  313. p("zu erreichen!Er wünscht ihnen Glück und Segen!");
  314. um2;
  315. p("(1) weitergehen");
  316. p("(2) nach Proviant betteln");
  317. p("(3) Proviant geben");
  318. um3;
  319. if was='1' then p("Sie sehen,daß der arme Mann Hunger hat!");
  320. if was='2' then p("Der Bauer schaut sie mitleidig an!");
  321. warte;
  322. Until was='3';
  323. {-------------------Teil 13------------}
  324. Repeat
  325. UM;
  326. p("Fröhlich,obwohl sie gar keinen Grund dazu haben,");
  327. p("setzen sie ihre anstrengende Reise fort.");
  328. p("Als sie nach vorne blicken,sehen sie lumpige,");
  329. p("rauhe und zerschlissene Kerle.Wegelagerer!");
  330. um2;
  331. p("(1) Fragen,ob sie gegen den Herzog kämpfen");
  332. p("(2) Alles geben,was du bei dir hast");
  333. p("(3) Schnurstracks weitergehen");
  334. um3;
  335. if was='1' then p("Sie halten sich die Bäuche vor lachen!");
  336. if was='2' then p("Das ist leider sehr wenig(nichts!)");
  337. warte;
  338. Until was='3';
  339. {--------------- Teil 14------------}
  340. Repeat
  341. UM;
  342. p("Beeindruckt von ihrer Zielstrebigkeit,und davon");
  343. p("ausgehend,daß sie auch ein armer Schlucker sind,und");
  344. p("Nicht etwa der Graf von Tannstein,lassen die Wege-");
  345. p("lagerer sie unbehelligt ziehen.");
  346. um2;
  347. p("(1) Schwert unterm Mantel holen");
  348. p("(2) weitergehen");
  349. p("(3) Wegelagerer noch schnell beschimpfen");
  350. um3;
  351. if was='2' then p("Immer nur weitergehen,das hält man ja im Kopf nicht aus!");
  352. if was='3' then p("Das wäre äußerst unklug(Überzahl)!");
  353. Warte;
  354. Until was='1';
  355. {--------------Teil 15-----------}
  356. Repeat
  357. UM;
  358. p("Nachdem die Kerle ihr goldenes Schwert sahen,");
  359. p("ergriffen sie Hals über Kopf die Flucht.Zufrieden");
  360. p("mit sich setzen sie ihren Gang fort,die Dämmerung");
  361. p("tritt schon ein,sie werden langsam müde!");
  362. um2;
  363. p("(1) schlafen");
  364. p("(2) hinlegen");
  365. p("(3) Platz suchen,hinlegen und schlafen");
  366. um3;
  367. if was='1' then p("Wo denn ?Im stehen etwa?");
  368. if was='2' then p("Auf der Straße?Wenn ein Traktor kommt...");
  369. warte;
  370. Until was='3';
  371. {----------------Teil 16----------}
  372. Repeat
  373. UM;
  374. p("Nach einem erholsamen und ruhigen Schlaf erwachen");
  375. p("Sie endlich!Ihr Magen knurrt,und es ist ungefähr");
  376. p("5 Uhr morgens,die Sonne erwacht gerade.Wenn jetzt");
  377. p("ein Gockel in der Nähe wäre,würde er jetzt sicher krähen!");
  378. um2;
  379. p("(1) Etwas zu uns nehmen");
  380. p("(2) Etwas essen");
  381. p("(3) Fürstlich speisen");
  382. um3;
  383. if was='1' then p("Das Proviant schmeckte herrvoragend!");
  384. if was='3' then p("Das Bauernfrühstück hat ihnen gut getan!");
  385. if was='2' then p("Eine sinnvolle Idee!");
  386. warte;
  387. Until (was='1') OR (was='2') OR (was='3');
  388. {----------------Teil 17-------------------}
  389. Repeat
  390. UM;
  391. p("Sie machen sich auf den Weg.Sie haben schon viel");
  392. p("Zeit verloren,aber bald müßten sie das Dorfe erreicht");
  393. p("haben.Nun sehen sie schon einige Häuser,und bemerken,");
  394. p("daß es unheimlich still ist.");
  395. um2;
  396. p("(1) in die Büsche schlagen");
  397. p("(2) weitergehen");
  398. p("(3) vorsichtig und langsam weitergehen");
  399. um3;
  400. if was='1' then p("Viel zu früh!Weiter!");
  401. if was='2' then p("Ein bischen Vorsicht könnte dem Graf nicht schaden!");
  402. if was='3' then p("Ja,so ist es gut,ihr wollt euren Kopf doch behalten!?");
  403. warte;
  404. Until was='3';
  405. {-----------------Teil 19--------------}
  406. Repeat
  407. UM;
  408. p("Sie gehen näher auf die Häuser zu,auf einmalsehen");
  409. p("Sie,daß eine Fahne im Dorf weht.Es ist des Herzogs");
  410. p("Fahne.Das Dorf steht aber eigentlich auf ihrem Lande.");
  411. p("Auch sehen sie die Leute im Dorf ihrer Arbeit nachgehen!");
  412. um2;
  413. p("(1) Leute sammeln,um gegen den Herzog zu kämpfen");
  414. p("(2) Weitergehen");
  415. p("(3) in den Busch!");
  416. um3;
  417. if was='1' then p("Nein,die armen Leute!Auf Tannstein warten 100 Ritter!");
  418. if was='2' then p("Nicht so überstürzen!");
  419. if was='3' then p("Jetzt ist das der einzige Weg...");
  420. warte;
  421. Until was='3';
  422. {---------------Teil 20-------------}
  423. Repeat
  424. UM;
  425. p("Sie verschwinden hinter einem Busch,und schleichen");
  426. p("sich um das Dorf herum.Nach einiger Zeit kommen sie");
  427. p("wieder auf einen Feldweg,der nach Tannstein führt.");
  428. p("Es geht bergauf...");
  429. um2;
  430. p("(1) weitergehen");
  431. p("(2) Päuschen machen");
  432. p("(3) Pause machen");
  433. um3;
  434. if was='1' then p("Sie können kaum weitergehen!");
  435. if was='3' then p("Keine Zeit für eine "#e"1m große "#e"0m Pause!");
  436. if was='2' then p("Sie gönnen sich ja sonst nichts...");
  437. warte;
  438. Until was='2';
  439. {-------------Teil 21------------}
  440. Repeat
  441. UM;
  442. p("Dachten sie,in diesem Spiel kann man eine ruhige ");
  443. p("Kugel schieben?Weit gefehlt!Hinter ihnen hören sie");
  444. p("Donnergrollen,doch es ist kein Donner,es sind ");
  445. p("Des Herzogs eiserne Ritter,und sie wollen ihren Kopf!");
  446. um2;
  447. p("(1) rennen,was das Zeug hält");
  448. p("(2) rennen,was das Pferd hält");
  449. p("(3) rennen,was die Schuhe halten");
  450. um3;
  451. if was='1' then p('ja,genau so!');
  452. if was='2' then p("welches Pferd?");
  453. if was='3' then p("welche Schuhe?");
  454. warte;
  455. Until was='1';
  456. {--------------Teil 22--------------}
  457. Repeat
  458. UM;
  459. p("Sie rennen,was ihre Lumpen halten.Der Schweiß");
  460. p("steht ihnen auf der Stirn,sie können");
  461. p("den Atem der Verfolger schon fast spüren!");
  462. p("lange werden sie das nicht durchhalten!");
  463. um2;
  464. p("(1) weiterrennen");
  465. p("(2) weiter rennen");
  466. p("(3) weiterrennen");
  467. um3;
  468. if (was='2') OR (was='3') OR (was='1') then p("Sie holen die letten Kräfte aus sich");
  469. warte;
  470. Until (was='2') OR (was='3') OR (was='1');
  471. {---------------Teil 23----------}
  472. Repeat
  473. UM;
  474. p("Knapp hinter ihnen sprengen die Verfoler!");
  475. p("Doch auf einmal merken sie,daß sie die");
  476. p("Umgebung sehr gut kennen!Hinter der nächsten Biegung");
  477. p("sehen sie ihr Ziel:Tannstein! Was rufen sie?");
  478. um2;
  479. p("(1) Laßt die Zugbrücke runter,Männer");
  480. p("(2) Geht nach Hause,Männer,der Film ist aus!");
  481. p("(3) So,jetzt machen wir ein Faß auf!");
  482. um3;
  483. if was='1' then p("Jawohl,zeig es ihnen!");
  484. if was='3' then p("Später,erst noch schnell kämpfen!");
  485. if was='2' then p("So dämlich können sie nicht sein,oder?!");
  486. warte;
  487. Until was='1';
  488. {--------------Teil 24-----------}
  489. Repeat
  490. page;
  491. p("Bei Tannstein surrt die große Zugbrücke herunter!");
  492. p("Es kommen heraus über hundert tapfere Ritter,die");
  493. p("sich sofort auf die Schurken des Herzogs stürzen!");
  494. p("Der Herzog sieht seine Niederlage sofort,und will");
  495. p("sich aus dem Staube machen!Sie sehen ihn!");
  496. um2;
  497. p("(1) Sofort in die Burg und schlafen!");
  498. p("(2) hinterher!");
  499. p("(3) Männer zusammenrufen,und ein Fest machen!");
  500. Normal;
  501. Write('Was wollen Sie tun?'); Readln(was);
  502. Until (was='1') OR (was='2') OR (was='3');
  503. page;
  504. if was='1' then Begin
  505.    page;
  506.    Write(#e'1m');
  507.    p("Ende des Grafen Von Tannstein:");
  508.    p("Sie verschanzten sich in der Burg,und wollten");
  509.    p("diese nie mehr verlassen!");
  510.    p("Derweil regierte der Herzog munter mit dem");
  511.    p("Faustrecht,und die armen Bauern waren ihm hilflos");
  512.    p("ausgeliefert,wofür sie sich 1524 bedankten,");
  513.    p("indem sie ihre schöne Burg ansteckten!");
  514.    p("Fortan zogen sie als Habenichts durch die Lande...");
  515.    warte; Normal;
  516.    Halt(0);
  517.    End;
  518. if was='3' then Begin
  519.    Write(#e'1m');
  520.    page;
  521.    p("Ende des Grafen von Tannstein:");
  522.    p("Während den Vorbereitungen des Festes überfiel");
  523.    p("der Herzog ihre Burg,nahm sie gefangen,und");
  524.    p("übernahm ihren ganzen Besitz,sowie die Lehnsherrschaft");
  525.    p("über ihre Untertanen,sogar ihre Freibauern ließ er");
  526.    p("nicht ungeschoren davonkommen!");
  527.    p("Entmachtet starben sie nach kurzer Zeit in einem");
  528.    p("Eckchen der Welt!");
  529.    warte; Normal;
  530.    Halt(0);
  531.    End;
  532. {---------------Teil 25-----------}
  533. page;
  534.   p("Sie nahmen den Herzog nach einem mutigen ");
  535.   p("Zweikampf gefangen,feierten ein Fest,und ");
  536.   p("ruhten sich dann eine Woche lang aus.");
  537.   p("Mit GOTTES Hilfe haben sie es also geschafft.");
  538.   p("Sie blieben ein gerechter und weiser Graf,der im ");
  539.   p("Alter von 36 zum Markgraf erhoben wurde.");
  540.   p("Nachdem sie eine hübsche Frau kennenlernten");
  541.   p("gingen sie mit ihr den Heiligen Bund der Ehe");
  542.   p("ein,und lebten noch lange Zeit");
  543.   p("  ");
  544.   p("  ");
  545.   p("->Auf ein Wiedersehen in Tannstein 2<-");
  546.   delay(400);
  547. warte;
  548. End.
  549.  
  550.  
  551.  
  552.  
  553.  
  554.  
  555.  
  556.  
  557.  
  558.  
  559.  
  560.  
  561.  
  562.  
  563.  
  564.  
  565.  
  566.  
  567.  
  568.  
  569.  
  570.  
  571.  
  572.  
  573.  
  574.  
  575.  
  576.  
  577.  
  578.